home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 4: GNU Archives / Linux Cubed Series 4 - GNU Archives.iso / gnu / sh-utils.12 / sh-utils / sh-utils-1.12 / src / printenv.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-10-01  |  3.1 KB  |  147 lines
  1. /* printenv -- print all or part of environment
  2.    Copyright (C) 89, 90, 91, 92, 93, 1994 Free Software Foundation, Inc.
  3.  
  4.    This program is free software; you can redistribute it and/or modify
  5.    it under the terms of the GNU General Public License as published by
  6.    the Free Software Foundation; either version 2, or (at your option)
  7.    any later version.
  8.  
  9.    This program is distributed in the hope that it will be useful,
  10.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12.    GNU General Public License for more details.
  13.  
  14.    You should have received a copy of the GNU General Public License
  15.    along with this program; if not, write to the Free Software
  16.    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  17.  
  18. /* Usage: printenv [variable...]
  19.  
  20.    If no arguments are given, print the entire environment.
  21.    If one or more variable names are given, print the value of
  22.    each one that is set, and nothing for ones that are not set.
  23.  
  24.    Exit status:
  25.    0 if all variables specified were found
  26.    1 if not
  27.  
  28.    David MacKenzie and Richard Mlynarik */
  29.  
  30. #include <config.h>
  31. #include <stdio.h>
  32. #include <sys/types.h>
  33. #include <getopt.h>
  34.  
  35. #include "version.h"
  36. #include "system.h"
  37.  
  38. void error ();
  39.  
  40. /* The name this program was run with. */
  41. char *program_name;
  42.  
  43. /* If non-zero, display usage information and exit.  */
  44. static int show_help;
  45.  
  46. /* If non-zero, print the version on standard output and exit.  */
  47. static int show_version;
  48.  
  49. static struct option const long_options[] =
  50. {
  51.   {"help", no_argument, &show_help, 1},
  52.   {"version", no_argument, &show_version, 1},
  53.   {0, 0, 0, 0}
  54. };
  55.  
  56. extern char **environ;
  57.  
  58. static void
  59. usage (status)
  60.      int status;
  61. {
  62.   if (status != 0)
  63.     fprintf (stderr, "Try `%s --help' for more information.\n",
  64.          program_name);
  65.   else
  66.     {
  67.       printf ("Usage: %s [OPTION]... [VARIABLE]...\n", program_name);
  68.       printf ("\
  69. \n\
  70.   --help      display this help and exit\n\
  71.   --version   output version information and exit\n\
  72. \n\
  73. If no VARIABLE, print them all.\n\
  74. ");
  75.     }
  76.   exit (status);
  77. }
  78.  
  79. void
  80. main (argc, argv)
  81.      int argc;
  82.      char **argv;
  83. {
  84.   char **env;
  85.   char *ep, *ap;
  86.   int i;
  87.   int matches = 0;
  88.   int c;
  89.   int exit_status;
  90.  
  91.   program_name = argv[0];
  92.  
  93.   while ((c = getopt_long (argc, argv, "", long_options, (int *) 0)) != EOF)
  94.     {
  95.       switch (c)
  96.     {
  97.     case 0:
  98.       break;
  99.  
  100.     default:
  101.       usage (1);
  102.     }
  103.     }
  104.  
  105.   if (show_version)
  106.     {
  107.       printf ("printenv - %s\n", version_string);
  108.       exit (0);
  109.     }
  110.  
  111.   if (show_help)
  112.     usage (0);
  113.  
  114.   if (optind == argc)
  115.     {
  116.       for (env = environ; *env != NULL; ++env)
  117.     puts (*env);
  118.       exit_status = 0;
  119.     }
  120.   else
  121.     {
  122.       for (i = optind; i < argc; ++i)
  123.     {
  124.       for (env = environ; *env; ++env)
  125.         {
  126.           ep = *env;
  127.           ap = argv[i];
  128.           while (*ep != '\0' && *ap != '\0' && *ep++ == *ap++)
  129.         {
  130.           if (*ep == '=' && *ap == '\0')
  131.             {
  132.               puts (ep + 1);
  133.               ++matches;
  134.               break;
  135.             }
  136.         }
  137.         }
  138.     }
  139.       exit_status = (matches != argc - optind);
  140.     }
  141.  
  142.   if (ferror (stdout) || fclose (stdout) == EOF)
  143.     error (2, errno, "standard output");
  144.  
  145.   exit (exit_status);
  146. }
  147.